home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 113 / XENIATGM113.iso / Patch / No One Lives Forever / NOLFUpdate003.exe / Setup / Spanish / spanish.rul < prev    next >
Text File  |  2001-04-25  |  3KB  |  103 lines
  1. //
  2. // SPANISH UPDATE setup.rul
  3. //
  4. // NOTE:  Changes made to this script should be made to the scripts for each 
  5. //          other language too!
  6. //
  7.  
  8. // Game & folder names
  9. #define APP_TITLE       "Actualizaci≤n de NOLF (v1.003)"
  10. #define APP_NAME        "No One Lives Forever"
  11. #define APP_VERSION     "1.0"
  12. #define APP_KEY         "NOLF.exe"
  13. #define DEFAULT_PATH    "Fox\\No One Lives Forever"
  14. #define DEFAULT_GROUP   "Fox Interactive\\No One Lives Forever"
  15. #define UPDATE_VERSION    "1.003"
  16. #define UPDATE_COMMAND    "-rez Nolfu003.rez -rez Nolfcres003.rez"
  17. #define README_FILE        "READMEU003.TXT"
  18.  
  19. declare
  20.     NUMBER  nResult;
  21.     NUMBER  nType, nSize;
  22.     STRING  svSrcDir, svTargetDir;
  23.     STRING  svRegKey;
  24.     STRING  svTemp;
  25.     STRING  svVersion;
  26.  
  27. program
  28. start:
  29.     // Set paths
  30.     svSrcDir     = SRCDIR ^ "..\\..\\";
  31.  
  32.     // Setup screen & title
  33.     Enable(BACKGROUND);
  34.     SetColor(BACKGROUND, RGB(236, 164, 4));
  35.     SetTitle(APP_TITLE, 26, WHITE);
  36.  
  37.     SetColor(STATUSBAR, BK_SOLIDBLUE);
  38.     PlaceBitmap(svSrcDir ^ "SETUP\\NOLF1.BMP", 1, CENTERED, CENTERED, CENTERED);
  39.     Delay(2);
  40.  
  41.     // Get installed path from registry
  42.     RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
  43.     svRegKey = "Software\\Monolith Productions\\" + APP_NAME + "\\" + APP_VERSION;
  44.     nType = REGDB_STRING;
  45.     nSize = -1;
  46.     nResult = RegDBGetKeyValueEx(svRegKey, "WorkingDirectory", nType, svTargetDir, nSize);
  47.     if (nResult < 0) then
  48.         svTemp = "No se ha podido actualizar " + APP_NAME + " a la versi≤n " + UPDATE_VERSION + 
  49.                  ".\n\níAseg·rate de que " + APP_NAME + " estΘ instalado correctamente!";
  50.         MessageBox(svTemp, WARNING);
  51.         exit;
  52.     endif;
  53.  
  54.     // Check version number of what's already installed
  55.     nType = REGDB_STRING;
  56.     nSize = -1;
  57.     nResult = RegDBGetKeyValueEx(svRegKey, "Version", nType, svVersion, nSize);
  58.     if (nResult = 0) then
  59.         nResult = StrCompare(svVersion, UPDATE_VERSION);
  60.         if (nResult > 0) then
  61.  
  62.             svTemp = "La versi≤n que estßs ejecutando es la v" + svVersion + " del " + APP_NAME +
  63.                      ".\n\nNo puedes actualizarla a la v" + UPDATE_VERSION + 
  64.                      ".\n\nPuedes descargar las ·ltimas actualizaciones del " + APP_NAME +
  65.                      " en: http://www.the-operative.com";
  66.             MessageBox(svTemp, INFORMATION);
  67.             exit;
  68.         endif;
  69.     endif;
  70.  
  71.     // Show status window
  72.     Disable(FEEDBACK_FULL);
  73.     Enable(STATUS);
  74.     Enable(INDVFILESTATUS);
  75.     PlaceWindow(STATUS, CENTERED, 0, LOWER_RIGHT);
  76.     SetStatusWindow(0, "Actualizando " + APP_NAME + "...");
  77.  
  78.     // Copy all game files...
  79.     StatusUpdate(ON, 100);
  80.     SRCDIR    = svSrcDir ^ "GAME";
  81.     TARGETDIR = svTargetDir;
  82.     CopyFile("*.*", "*.*");
  83.  
  84.     // Copy language-specific files...
  85.     SRCDIR = svSrcDir ^ "GAME\\SPANISH";
  86.     CopyFile("*.*", "*.*");
  87.  
  88.     // Display done message
  89.     SetStatusWindow(1000, "íActualizaci≤n completa!");
  90.  
  91.     // Set new registry keys
  92.     RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
  93.     RegDBSetKeyValueEx(svRegKey, "Version", REGDB_STRING, UPDATE_VERSION, -1);
  94.     RegDBSetKeyValueEx(svRegKey, "Update Command Line", REGDB_STRING, UPDATE_COMMAND, -1);
  95.  
  96.     // Do the readme...
  97.  
  98.     svTemp = "íSe ha completado la Actualizaci≤n del " + APP_NAME + "! ┐Te gustarφa leer el archivo README ahora?";
  99.     if (AskYesNo(svTemp, YES) = YES) then
  100.        LaunchAppAndWait("NOTEPAD.EXE " + svTargetDir ^ README_FILE, "", NOWAIT);
  101.     endif;
  102.  
  103. exit;